home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 4 / Meeting Pearls Vol. IV (1996)(GTI - Schatztruhe)[!].iso / sys / s / brik-quiet < prev    next >
AmigaDOS Script File  |  1995-10-13  |  790b  |  36 lines
  1. .key Language/A
  2. .bra {
  3. .ket }
  4.  
  5. Failat 25
  6.  
  7. IF {Language} EQ "deutsch"
  8.     Run >NIL: :C/AutoReq "-tDie CD wird getestet." "-tBitte haben Sie ein paar Stunden Geduld." -nOK
  9. ELSE
  10.     Run >NIL: :C/AutoReq "-tThe CD-ROM is being tested." "-tPlease stand by for a few hours." -nOK
  11. ENDIF
  12.  
  13. Assign >NIL: EXISTS T:
  14. IF WARN
  15.     Assign MPTMPBRIK{$$}: RAM:
  16. ELSE
  17.     Assign MPTMPBRIK{$$}: T:
  18. ENDIF
  19.  
  20. CD :
  21.  
  22. Stack 30000
  23.  
  24. :C/brik <:Index/CRCList >MPTMPBRIK{$$}:MP-brik-output{$$} -C
  25.  
  26. IF WARN
  27.     Join :SYS/S/brik-error-{Language} MPTMPBRIK{$$}:MP-brik-output{$$} TO MPTMPBRIK{$$}:MP-brik.displayme{$$}
  28.     :C/MetaTool MPTMPBRIK{$$}:MP-brik.displayme{$$} TEXT
  29.     Delete MPTMPBRIK{$$}:MP-brik.displayme{$$}
  30. ELSE
  31.     :C/MetaTool :SYS/S/brik-ok-{Language} TEXT
  32. ENDIF
  33.  
  34. Delete QUIET MPTMPBRIK{$$}:MP-brik-output{$$}
  35. Assign MPTMPBRIK{$$}:
  36.